home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.trace.wisc.edu
/
ftp.trace.wisc.edu.zip
/
ftp.trace.wisc.edu
/
hypertyper.sit.hqx
/
HyperTyper
/
HyperTyper - color
/
background_2744.txt
< prev
next >
Wrap
Text File
|
1995-08-20
|
4KB
|
130 lines
-- background: 2744 from stack: in
-- bmap block id: 0
-- flags: 4000
-- background id: 0
-- name:
----- HyperTalk script -----
on inSert
select after text of card field id 1
end inSert
on lowerCase
global keYs
if keYs is true then
set hilite of button "SHIFT" to false
put false into keYs
lock screen
set name of button "A" to "a"
set name of button "B" to "b"
set name of button "C" to "c"
set name of button "D" to "d"
set name of button "E" to "e"
set name of button "F" to "f"
set name of button "G" to "g"
set name of button "H" to "h"
set name of button "I" to "i"
set name of button "J" to "j"
set name of button "K" to "k"
set name of button "L" to "l"
set name of button "M" to "m"
set name of button "N" to "n"
set name of button "O" to "o"
set name of button "P" to "p"
set name of button "Q" to "q"
set name of button "R" to "r"
set name of button "S" to "s"
set name of button "T" to "t"
set name of button "U" to "u"
set name of button "V" to "v"
set name of button "W" to "w"
set name of button "X" to "x"
set name of button "Y" to "y"
set name of button "Z" to "z"
set name of button "!" to "1"
set name of button "@" to "2"
set name of button "#" to "3"
set name of button "$" to "4"
set name of button "%" to "5"
set name of button "^" to "6"
set name of button "&" to "7"
set name of button "*" to "8"
set name of button "(" to "9"
set name of button ")" to "0"
set name of button "_" to "-"
set name of button "+" to "="
set name of button "|" to "\"
set name of button "{" to "["
set name of button "}" to "]"
set name of button ":" to ";"
set name of button "''" to "'"
set name of button "<" to ","
set name of button ">" to "."
set name of button "?" to "/"
unlock screen
else idle
end lowerCase
on capsnotDown
global lockIt
put false into lockIt
set hilite of button "LOCK" to false
lock screen
set name of button "A" to "a"
set name of button "B" to "b"
set name of button "C" to "c"
set name of button "D" to "d"
set name of button "E" to "e"
set name of button "F" to "f"
set name of button "G" to "g"
set name of button "H" to "h"
set name of button "I" to "i"
set name of button "J" to "j"
set name of button "K" to "k"
set name of button "L" to "l"
set name of button "M" to "m"
set name of button "N" to "n"
set name of button "O" to "o"
set name of button "P" to "p"
set name of button "Q" to "q"
set name of button "R" to "r"
set name of button "S" to "s"
set name of button "T" to "t"
set name of button "U" to "u"
set name of button "V" to "v"
set name of button "W" to "w"
set name of button "X" to "x"
set name of button "Y" to "y"
set name of button "Z" to "z"
set name of button "@" to "2"
set name of button "#" to "3"
set name of button "$" to "4"
set name of button "%" to "5"
set name of button "^" to "6"
set name of button "&" to "7"
set name of button "*" to "8"
set name of button "(" to "9"
set name of button ")" to "0"
set name of button "_" to "-"
set name of button "+" to "="
set name of button "|" to "\"
set name of button "{" to "["
set name of button "}" to "]"
set name of button ":" to ";"
set name of button "''" to "'"
set name of button "<" to ","
set name of button ">" to "."
set name of button "?" to "/"
set name of button "!" to "1"
unlock screen
end capsnotDown